CAADiameters_ApparentAsteroidDiameter <-
function(Delta, d){
.Call("CAADiameters_ApparentAsteroidDiameter", Delta, d)
}
